/*
chars
parse a a
parse q q
parse z z
noparse A P 1
noparse '%' P 1
*/

# Semantic predicate and any matcher:

P :: char * ← b:A &{ *b >= 'a' && *b <= 'z' } { b }
A <- . { ref_str() }
